Top 10k strings from Nutrion (1983)(Riko Data).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 r$="female"
   2 y$;x$;" ";
   2 c$(m,n,o+2
   2 c$(m,n,o)))
   2 ;"PLEASE WAIT"
   2 ;"IF NOT, TYPE ""N"""
   2 ;"************************":
   2 )))*p/q/(10
   2 (c$(m,n,o+1
   1 z=z+l(k,j):
   1 x$="ounce":
   1 x$="100 grams"
   1 t;"} ";a$(w
   1 r$="male":
   1 q$="metric":
   1 q$="imp'r'l"
   1 nutrion   0
   1 n(d)=n(d)+i2
   1 l(d,k)=l(d,k)+a
   1 i2=i2*28.35
   1 i$="begin"
   1 i$="BEGIN"
   1 i$="(in):":
   1 i$="(cm):":
   1 f$="(lb):"
   1 f$="(kg):"
   1 bc=bc+(z+energy)*c(j):
   1 a);" ";d$;"
   1 \))-bb)*.06
   1 VITAMIN D     (iu)U
   1 Hi             I
   1 Greetings      Hello          Howdy          Hi             Good day       Nice to see youWelcome        Salutations    e
   1 Created with Ramsoft MakeTZX
   1 Ale, mildBeerCognacCiderGinRumWhiskySherryVermouth, FrenchVermouth, ItalianWine, BeaujolaisPortSauterneLemon juiceLime juiceOrange juiceTomato juiceVegetable juiceChocolateCoca-ColaCocoaCoffee,black,no sugarLemonadeOvaltineTea,black,no sugarBiscuit, plainChocolate biscuitGinger snapRitz crackerShortbreadHot Cross bunDanish pastryDoughnutEclair/Cream puffFruitcakeGingerbreadSponge cakeBread, whiteToast, white breadBread, whole wheatToast, whole wheatBreadcrumbsFlourHamburger rollRoll, white crustyPastry, shortcrustMacaroniNoodlesRiceSpaghettiAllbranBran FlakesCorn FlakesOatmealRice CrispiesPuffed WheatShredded WheatBeans & FrankfurtersBeef & Vegetable stewChili-con-Carne & beansChop Suey & meatChop Suey, cannedChow Mien & chickenChow Mien, cannedMacaroni cheesePizza & cheese toppingSpaghetti & meat sauceSpaghetti & tomato sauceSpaghetti, tomato sauce & cheeseSpaghetti & meat ballsSpanish riceMixed vegetables, frozenMixed vegetables, cooked/drainedWelsh RarebitStock cubeCurry powderGravy browningMustardOlives
   1 ;i;" HOURS"
   1 ;;"YOUR IDEAL WEIGHT IS    ";e;" ";f$(2
   1 ;"spend on each";
   1 ;"per day you ";
   1 ;"activity.";
   1 ;"[FOR DETAILED DATA,TYPE ""D""]"
   1 ;"YOU NOW HAVE THREE CHOICES."
   1 ;"What is your age?":
   1 ;"TYPE THE LETTER OF YOUR CHOICE"
   1 ;"TYPE A LETTER, OR ""S"" TO RETURN."
   1 ;"TRY AGAIN ";d$
   1 ;"TO VERIFY, REWIND TAPE,":
   1 ;"TO CONTINUE, PRESS ""C""."
   1 ;"THIS IS MY ""MEAL INPUT"" DISPLAY"
   1 ;"THESE ARE RICH IN ";x$(
   1 ;"THEN PRESS ""V""."
   1 ;"THAT WOULD MAKE YOU NON-HUMANOID"
   1 ;"THANK YOU ";d$
   1 ;"TAPE LOADING ERROR, ENTER":
   1 ;"START IN ""PLAY"" MODE,":
   1 ;"SAVING COMPLETE":
   1 ;"Press ""L"" for a list of":
   1 ;"Press ""C"" to continue."
   1 ;"PRESS ANY KEY TO CONTINUE"
   1 ;"NUTRIENT";
   1 ;"NOW ENTER THE INFORMATION       "
   1 ;"MEAL INPUT"
   1 ;"If you wish to change anything, ":
   1 ;"If you have eaten,or need data":
   1 ;"IF VERIFY GIVES A":
   1 ;"IF THIS IS CORRECT, TYPE ""Y"""
   1 ;"IF ";i$;" IS CORRECT, TYPE ""Y""":
   1 ;"I THINK THIS IS THE ";A;E$;" DAY"
   1 ;"H} DAILY CALORIE TGT:";
   1 ;"How many ";x$;"s ?"
   1 ;"HOW MANY CALS?"
   1 ;"G} TARGET WT ";f$;
   1 ;"F} PRESENT WT ";f$
   1 ;"E} WRIST ";i$
   1 ;"Enter the hours";
   1 ;"D} HEIGHT ";i$
   1 ;"Cals/";x$:
   1 ;"A} INPUT A KNOWN NUMBER OF CALS."
   1 ;"""R"" to leave";
   1 ;"""P"" to enter";
   1 ;"""M"" to move";
   1 ;"""GOTO 100"" AND RE-SAVE."
   1 ;"  this display."
   1 ;"  the marker";
   1 ;"    TYPE";
   1 **vitamins**
   1 **progress**
   1 )+(a*4.184
   1 "type it's code letter.":
   1 "the 10 foods which are":
   1 "on,any of these,type it's letter"
   1 "highest in each nutrient."
   1 "deficient in:-"
   1 "and your actual daily averages."
   1 "Your diet is tending to become":
   1 "Type ""N"" for next page."
   1 "Type ""C"" to continue,":
   1 "To go fwd one page,type ""P":
   1 "To go back one page,type ""Q""":
   1 "THIS IS MY INITIAL DISPLAY."
   1 "THIAMIN       (mcg)","RIBOFLAVIN    (mcg)","NICOTINIC ACID(mg)","ASCORBIC ACID (mg)","VITAMIN A     (iu)","VITAMIN D     (iu)"
   1 "Sleeping","Sitting","Writing","Washing up","Ironing","Typing","Laundering","Walking","Gardening","Metalworking","Standing","Sawing","Cycling","Football","Swimming","Polishing","Running","Walking hard","Running hard"
   1 "SODIUM        (mg)","POTASSIUM     (mg)","CALCIUM       (mg)","MAGNESIUM     (mg)","PHOSPHORUS    (mg)","IRON          (mg)"
   1 "R} VEGETABLES"
   1 "Q} SWEETS"
   1 "P} SOUPS (TINNED)"
   1 "NEW DIET BY ENTERING ""BEGIN"") "
   1 "M} JAMS & JELLIES"
   1 "L} FRUIT"
   1 "J} FATS & OILS"
   1 "I} THIS IS DAY:";
   1 "I} EGGS (CHICKEN)"
   1 "I PRESENTLY KNOW THE FOLOWING":
   1 "H} DESSERTS"
   1 "G} DAIRY PRODUCTS"
   1 "F} CONDIMENTS/PICKLES/SAUCES"
   1 "For new choice,type ""N"""
   1 "E} COMBINATION DISHES"
   1 "ENERGY        (cal)","PROTEIN       (gr)","FIBRE         (gr)","TRYPTOPHAN    (mg)","PHENYLALANINE (mg)","LEUCINE       (mg)","ISOLEUCINE    (mg)","LYSINE        (mg)","VALINE        (mg)","METHIONINE    (mg)","THREONINE     (mg)"
   1 "D} CEREALS-READY TO SERVE"
   1 "C} SEX (M or F):";
   1 "C} RETURN TO INITIAL DISPLAY."
   1 "C} BREAD/ROLLS/FLOUR/PASTA/RICE"
   1 "B} UNITS (I or M):";
   1 "B} INPUT A MEAL OR STUDY FOOD."
   1 "B} BISCUITS/CAKES/BUNS"
   1 "A} NAME";
   1 "A} DRINKS"
   1 "ABOUT YOU :-":
   1 "(YOU MAY START A COMPLETELY  ":
   1 """T"" to observe your progress. "
   1 """S"" to save, ""M"" to continue,"
   1 """R"" to return to Initial Display"
   1 """R"" for the Initial Display"
   1 """P"" to enter your profile,"
   1 "  FOODS ARE CLASSIFIED AS :-":
   1 "   nutritional requirements,":
   1 "   in order to maintain your":
   1 "   health & present weight,":
   1 "     These are your daily":
   1  R. CAREY,            SPECTRE, 1983
   1